FireMonkey/Rad Studio XE2: How can I show the SaveDialog filter on OS X? [migrated]
Posted
by
Zoltan Karpati
on Programmers
See other posts from Programmers
or by Zoltan Karpati
Published on 2012-10-20T19:52:58Z
Indexed on
2012/10/20
23:19 UTC
Read the original article
Hit count: 215
I created an (Delphi XE2) Firemonkey sample program which contains a TButton and a TSavedialog with two different filters. (The TSaveDialog component supports the Win32/Win64 and OS X platform.)
It works fine on Win32/Win64, but I don't now why it does not show the Savedialog filters on OS X (VirtualBox/OS X 10.7.x).
How can I get it to work on OS X ?
procedure TForm1.Button_SaveClick(Sender: TObject);
begin
SaveDialog.Filter:='Format_1 (*.fmt1)|*.fmt1|Format_2 (*.fmt2)|*.fmt2';
If Savedialog.Execute Then ShowMessage(SaveDialog.FileName+#13+'Selected filterindex: '+Inttostr(SaveDialog.FilterIndex));
end;
© Programmers or respective owner